home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 July: Mac OS SDK / Dev.CD Jul 99 SDK1.toast / Development Kits / Mac OS / Interfaces&Libraries / Universal / Interfaces / AIncludes / DeskBus.a < prev    next >
Encoding:
Text File  |  1998-08-17  |  5.0 KB  |  157 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        DeskBus.a
  3. ;
  4. ;    Contains:    Apple Desktop Bus (ADB) Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.2
  8. ;
  9. ;    Copyright:    © 1987-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        For bug reports, consult the following page on
  12. ;                the World Wide Web:
  13. ;
  14. ;                    http://developer.apple.com/bugreporter/
  15. ;
  16. ;
  17.     IF &TYPE('__DESKBUS__') = 'UNDEFINED' THEN
  18. __DESKBUS__ SET 1
  19.  
  20.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  21.     include 'MacTypes.a'
  22.     ENDIF
  23.     IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
  24.     include 'MixedMode.a'
  25.     ENDIF
  26.  
  27.     IF TARGET_OS_MAC THEN
  28. ; typedef SInt8                         ADBAddress
  29.  
  30. ; 
  31. ;    TempADBServiceRoutineUPP is needed because of circular definition of
  32. ;    ADBServiceRoutineProcPtr and ADBServiceRoutineUpp depending on each other.
  33. ;
  34.  
  35. ; typedef ProcPtr                         TempADBServiceRoutineUPP
  36.  
  37. ADBDataBlock            RECORD 0
  38. devType                     ds.b    1                ; offset: $0 (0)        ;  original handler ID 
  39. origADBAddr                 ds.b    1                ; offset: $1 (1)        ;  original ADB Address 
  40. dbServiceRtPtr             ds.l    1                ; offset: $2 (2)        ;  service routine pointer 
  41. dbDataAreaAddr             ds.l    1                ; offset: $6 (6)        ;  this field is passed as the refCon parameter to the service routine 
  42. sizeof                     EQU *                    ; size:   $A (10)
  43.                         ENDR
  44. ; typedef struct ADBDataBlock *            ADBDBlkPtr
  45.  
  46. ADBSetInfoBlock            RECORD 0
  47. siService                 ds.l    1                ; offset: $0 (0)        ;  service routine pointer 
  48. siDataAreaAddr             ds.l    1                ; offset: $4 (4)        ;  this field is passed as the refCon parameter to the service routine 
  49. sizeof                     EQU *                    ; size:   $8 (8)
  50.                         ENDR
  51. ; typedef struct ADBSetInfoBlock *        ADBSInfoPtr
  52.  
  53. ;  ADBOpBlock is only used when calling ADBOp from 68k assembly code 
  54. ADBOpBlock                RECORD 0
  55. dataBuffPtr                 ds.l    1                ; offset: $0 (0)        ;  buffer: pointer to variable length data buffer 
  56. opServiceRtPtr             ds.l    1                ; offset: $4 (4)        ;  completionProc: completion routine pointer 
  57. opDataAreaPtr             ds.l    1                ; offset: $8 (8)        ;  refCon: this field is passed as the refCon parameter to the completion routine 
  58. sizeof                     EQU *                    ; size:   $C (12)
  59.                         ENDR
  60. ; typedef struct ADBOpBlock *            ADBOpBPtr
  61.  
  62. ;
  63. ; pascal void ADBReInit(void )
  64. ;
  65.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  66.         _ADBReInit:    OPWORD    $A07B
  67.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  68.         IMPORT_CFM_FUNCTION ADBReInit
  69.     ENDIF
  70.  
  71. ; 
  72. ;    ADBOp has a different interface for 68k assembly than for everything else
  73. ;    for 68k assembly the interface is 
  74. ;    #pragma parameter __D0 ADBOp(__A0,__D0)
  75. ;    OSErr ADBOp( ADBOpBlock * pb, short commandNum );
  76. ;
  77.  
  78. ; 
  79. ;    IMPORTANT NOTE:
  80. ;    "Inside Macintosh: Devices" documents the completion routine for ADBOp will be called with
  81. ;    four parameters using 68k register based calling conventions, specifically the completion routine
  82. ;    passed in should be of type ADBServiceRoutineProcPtr. However, when upp types were first added
  83. ;    to this interface file, the type ADBCompletionUPP was mistakenly used for the second parameter
  84. ;    to ADBOp. Since applications have shipped using completion routines of type ADBCompletionUPP,
  85. ;    the mistake cannot be corrected.
  86. ;    The only difference between ADBServiceRoutineUPP and ADBCompletionUPP is the former takes an extra
  87. ;    argument which is a pointer to itself, fortunately not needed for PowerPC code.
  88. ;    For compatibility with existing 68k code, when an ADBOp completion routine is called,
  89. ;    68k register A1 will point to the completion routine, as documented in Inside Mac.
  90. ;
  91.  
  92. ;
  93. ; pascal OSErr ADBOp(Ptr refCon, ADBCompletionUPP compRout, Ptr buffer, short commandNum)
  94. ;
  95.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  96.         _ADBOp:    OPWORD    $A07C
  97.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  98.         IMPORT_CFM_FUNCTION ADBOp
  99.     ENDIF
  100.  
  101. ;
  102. ; pascal short CountADBs(void )
  103. ;
  104.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  105.         ; returns:
  106.         ;    short           <= D0
  107.         _CountADBs:    OPWORD    $A077
  108.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  109.         IMPORT_CFM_FUNCTION CountADBs
  110.     ENDIF
  111.  
  112. ;
  113. ; pascal ADBAddress GetIndADB(ADBDataBlock *info, short devTableIndex)
  114. ;
  115.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  116.         ; parameters:
  117.         ;    info            => A0
  118.         ;    devTableIndex   => D0
  119.         ; returns:
  120.         ;    ADBAddress      <= D0
  121.         _GetIndADB:    OPWORD    $A078
  122.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  123.         IMPORT_CFM_FUNCTION GetIndADB
  124.     ENDIF
  125.  
  126. ;
  127. ; pascal OSErr GetADBInfo(ADBDataBlock *info, ADBAddress adbAddr)
  128. ;
  129.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  130.         ; parameters:
  131.         ;    info            => A0
  132.         ;    adbAddr         => D0
  133.         ; returns:
  134.         ;    OSErr           <= D0
  135.         _GetADBInfo:    OPWORD    $A079
  136.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  137.         IMPORT_CFM_FUNCTION GetADBInfo
  138.     ENDIF
  139.  
  140. ;
  141. ; pascal OSErr SetADBInfo(const ADBSetInfoBlock *info, ADBAddress adbAddr)
  142. ;
  143.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  144.         ; parameters:
  145.         ;    info            => A0
  146.         ;    adbAddr         => D0
  147.         ; returns:
  148.         ;    OSErr           <= D0
  149.         _SetADBInfo:    OPWORD    $A07A
  150.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  151.         IMPORT_CFM_FUNCTION SetADBInfo
  152.     ENDIF
  153.  
  154.     ENDIF    ; TARGET_OS_MAC
  155.     ENDIF ; __DESKBUS__ 
  156.  
  157.